perm filename WLDMOD.HDR[AL,HE]2 blob sn#358174 filedate 1978-05-29 generic text, type T, neo UTF8
REQUIRE "WLDMOD.REL[AL,HE]" LOAD_MODULE;

EXTERNAL RECURSIVE PROCEDURE WLDASG(RPTR(STMNT) S;
		ITEMVAR IW;REFERENCE ITEMVAR OW;REFERENCE BOOLEAN NFLAG);
EXTERNAL PROCEDURE ASRTIT(RPTR(AFACT,SFACT) F;ITEMVAR IW,OW);
EXTERNAL PROCEDURE DENYIT(RPTR(SFACT,AFACT) F;ITEMVAR IW,OW);
EXTERNAL RPTR(EXPRN) PROCEDURE NEW_EXPRN(INTEGER DT,OP;RCELL ARGS);
EXTERNAL RPTR(STMNT) PROCEDURE STMAKE(RSSS SEM(NULL_RECORD));
EXTERNAL RPTR(STMNT) PROCEDURE NEW_STMNT(ITEMVAR IW,OW; RSSS SEM);
EXTERNAL RPTR(GASSIGN) PROCEDURE NEW_GASSIGN(RVAR V;INTEGER OP;
					RPTR(CALCULATOR) C);
EXTERNAL RPTR(ALSODO) PROCEDURE NEW_ALSODO(RVAR V;INTEGER OP;
					RPTR(CHANGER) C);
EXTERNAL PROCEDURE DO_UNFIX(ITEMVAR OW;RANY F1,F2;REFERENCE RCELL GPHCODE);
EXTERNAL PROCEDURE DO_AFFIX(ITEMVAR OW;RANY F1,F2,BV;REXPR AE;RVAR RGF;
			    REFERENCE RCELL GPHCODE);
EXTERNAL REXPR PROCEDURE DEPR(RVAR WHAT;ITEMVAR WLD);
EXTERNAL RANY PROCEDURE STTBLK(RANY S);
EXTERNAL RECPROC STINTERP(RPTR(STMNT) S);
EXTERNAL PROCEDURE WMTEST;